home *** CD-ROM | disk | FTP | other *** search
/ Interactive Media Design Review 1999 / Interactive Media Design Review 1999.iso / pc / Demos / Bombardier_PC / BSCRIPTS.CST / 00051_Script_info init < prev    next >
Text File  |  1999-04-25  |  2KB  |  70 lines
  1. -- ⌐ 1998 @radical.media, inc. & Concurrent New Media Group, L.L.C.
  2. -- Developed for Bombardier, Inc.
  3. --
  4. -- All programming developed by: 
  5. -- Robert Fabricant, Valerie Valoueva, Ossi Shaked, 
  6. -- Henry Sauvageot, Chris Howell & Chris Girand
  7. --
  8. -- Use of this code by parties other than @radical.media, inc. or their
  9. --agents 
  10. -- without the express written consent of @radical.media, inc. AND Concurrent 
  11. -- New Media Group, L.L.C. is strictly prohibited.
  12. ------------------------------------------------------
  13. -------*This script is not used in this version of the movie*----------
  14.  
  15. property item_sprt
  16.  
  17. on getPropertyDescriptionList
  18.   set description=[:]
  19.   
  20.   addProp description,#item_sprt,[#default:6,#format:#integer,#comment:¼
  21. "the sprite number of the appropriate menu item. "]
  22.   
  23.   return description
  24. end
  25.  
  26. on getBehaviorDescription
  27.   return "init script before any info menu marker.   ¼
  28.   this script adjust the info menu highligh state when using presentation tool or index"
  29. end
  30.  
  31.  
  32.  
  33. on enterframe
  34.   global gInfoSprt,gIImage
  35.   global gMode,gFlag
  36.   put "------------------------------------"
  37.   
  38.   
  39.   
  40.   put gmode&&"mode"
  41.   
  42.   put "empty mode"
  43.   
  44.   put  gInfoSprt&&"ginfosprt"
  45.   put gIImage&&"item" 
  46.   
  47.   if gInfoSprt <> item_sprt and gInfoSprt <>"" then
  48.     set the castnum of sprite gInfoSprt to gIImage 
  49.   end if
  50.   
  51.   if gInfoSprt <> item_sprt  then
  52.     set gInfoSprt = item_sprt
  53.     put  gInfoSprt&&"ginfosprt"
  54.     set gIImage = the castnum of sprite item_sprt
  55.     set the castnum of sprite item_sprt to the castnum of sprite item_sprt +2
  56.     put "ssss"
  57.   end if
  58.   
  59.   resetTour
  60.   set the visible of sprite 22 to false
  61.   
  62.   puppetsprite 22, false
  63.   updatestage
  64.   puppetSprite 22, true
  65.   updatestage
  66.   
  67.   
  68. end
  69.  
  70.